-- card: 7465 from stack: in.03 ะตะตะต -- bmap block id: 3657 -- flags: 0000 -- background id: 10462 -- name: ----- HyperTalk script ----- on openCard show card button "cover" put "" into card field wish put "" into card field smartAss set the scroll of card field id 25 to 0 end openCard on closeCard show card button "cover" put "" into card field wish put "" into card field smartAss end closeCard -- part 1 (button) -- low flags: 00 -- high flags: 8003 -- rect: left=3 top=317 right=339 bottom=226 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 1 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: show all object buttons in stack ----- HyperTalk script ----- on mouseUp if the userLevel<3 then beep answer "You must set a higher userLevel first." with "OK" exit mouseUp end if show msg set the lockScreen to true put the number of cards into numCards repeat with cardCount = 5 to numCards put cardCount into msg go to card cardCount put the number of card buttons into numButtons repeat with butNum = 1 to numButtons show card button butNum end repeat end repeat go to card id 10613 end mouseUp -- part 4 (button) -- low flags: 00 -- high flags: 2000 -- rect: left=478 top=306 right=342 bottom=512 -- title width / last selected line: 0 -- icon id / first selected line: 9301 / 9301 -- text alignment: 1 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: knife ----- HyperTalk script ----- on mouseUp end mouseUp -- part 5 (button) -- low flags: 00 -- high flags: 2000 -- rect: left=445 top=271 right=307 bottom=479 -- title width / last selected line: 0 -- icon id / first selected line: 1015 / 1015 -- text alignment: 1 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: nodule ----- HyperTalk script ----- on mouseUp end mouseUp -- part 6 (button) -- low flags: 00 -- high flags: 2000 -- rect: left=478 top=271 right=307 bottom=512 -- title width / last selected line: 0 -- icon id / first selected line: 14953 / 14953 -- text alignment: 1 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: ladder ----- HyperTalk script ----- on mouseUp end mouseUp -- part 7 (button) -- low flags: 00 -- high flags: 2000 -- rect: left=478 top=236 right=272 bottom=512 -- title width / last selected line: 0 -- icon id / first selected line: 1019 / 1019 -- text alignment: 1 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: bomb ----- HyperTalk script ----- on mouseUp end mouseUp -- part 8 (button) -- low flags: 00 -- high flags: 2000 -- rect: left=445 top=236 right=272 bottom=479 -- title width / last selected line: 0 -- icon id / first selected line: 24317 / 24317 -- text alignment: 1 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: key ----- HyperTalk script ----- on mouseUp end mouseUp -- part 9 (button) -- low flags: 00 -- high flags: 2000 -- rect: left=478 top=201 right=237 bottom=512 -- title width / last selected line: 0 -- icon id / first selected line: 7012 / 7012 -- text alignment: 1 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: gem ----- HyperTalk script ----- on mouseUp global takeFlag,examFlag,object,cardID put the name of the target into object if takeFlag = true then send take to card id cardID else put "a glowing gem" into field 3 put false into examFlag end mouseUp -- part 10 (button) -- low flags: 00 -- high flags: 2000 -- rect: left=445 top=201 right=237 bottom=479 -- title width / last selected line: 0 -- icon id / first selected line: 23078 / 23078 -- text alignment: 1 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: orb ----- HyperTalk script ----- on mouseUp end mouseUp -- part 11 (button) -- low flags: 00 -- high flags: 8003 -- rect: left=27 top=60 right=83 bottom=273 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 1 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: I wish to win the game. ----- HyperTalk script ----- on mouseUp answer "Congratulations! You have Won The Game!" with "OK" end mouseUp -- part 12 (button) -- low flags: 00 -- high flags: 8003 -- rect: left=27 top=85 right=108 bottom=273 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 1 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: I wish to know the stack password. ----- HyperTalk script ----- on mouseUp hide card button "cover" end mouseUp -- part 13 (button) -- low flags: 00 -- high flags: 8003 -- rect: left=27 top=110 right=133 bottom=273 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 1 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: I wish to return to the game. ----- HyperTalk script ----- on mouseUp global cardID go to card id cardID end mouseUp -- part 14 (button) -- low flags: 00 -- high flags: 8003 -- rect: left=28 top=135 right=158 bottom=274 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 1 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: other... ----- HyperTalk script ----- on mouseUp put "" into card field wish put "" into card field smartAss ask "What is your wish?" with "I wish for: " put it into card field wish put "Well, OK, but this will probably take a few weeks." into card field smartAss end mouseUp -- part 24 (button) -- low flags: 00 -- high flags: 8003 -- rect: left=3 top=214 right=238 bottom=240 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 1 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: edit the doMenu trap (see below) ----- HyperTalk script ----- on mouseUp set userLevel to 5 edit script of this stack end mouseUp -- part 15 (field) -- low flags: 00 -- high flags: 0000 -- rect: left=330 top=20 right=70 bottom=509 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 0 -- font id: 3 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: wish -- part 16 (field) -- low flags: 00 -- high flags: 0000 -- rect: left=330 top=72 right=122 bottom=509 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 0 -- font id: 3 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: smartAss -- part 17 (button) -- low flags: 80 -- high flags: 8001 -- rect: left=200 top=190 right=208 bottom=251 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 1 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: PRINITA -- part 18 (button) -- low flags: 80 -- high flags: 0001 -- rect: left=237 top=190 right=208 bottom=252 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 1 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: -- part 25 (field) -- low flags: 01 -- high flags: 2007 -- rect: left=3 top=241 right=313 bottom=414 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 0 -- font id: 3 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: -- part 19 (button) -- low flags: 80 -- high flags: 0001 -- rect: left=162 top=191 right=208 bottom=174 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 1 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: -- part 22 (button) -- low flags: 00 -- high flags: 0001 -- rect: left=0 top=175 right=342 bottom=512 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 1 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: cover -- part 23 (button) -- low flags: 00 -- high flags: 0000 -- rect: left=363 top=135 right=163 bottom=457 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 1 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: ----- HyperTalk script ----- on mouseUp answer "Do you really want to quit the game?" with "yes"or"no" if it="no" then exit mouseUp send quitGame to card id 10613 end mouseUp -- part contents for card part 25 ----- text ----- How to remove the protection from this stack: NOTE -- Please do not distribute unprotected stacks! 1) Display the menu bar by pressing Command-SpaceBar. Hold down the Command Key and select "Protect Stack..." from under the file menu. 2) Enter the stack password and set the user level limit to allow Scripting. 3) Click on the "edit the doMenu trap" button above and edit the stack script to "comment out" the doMenu handler. To reactivate the stack protection, reinstate the doMenu handler and choose "Protect Stack..." to set the user level limit to Browsing.